ＧＡＭＥ−ＭＺインタプリタ　アスキー　１９７９年１０月号掲載 マシン語　０５８００Ｈ−０５ＥＦＦＨ　Ｓ：５８００ 起動方法 モニタから起動 　コールドスタート　０５８００Ｈ 　ホット　スタート　０５８０２Ｈ ＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−＋ ｜　　　《命　　令》　　　　　｜　　《一般形》　　｜　　　　　　　　　　　　《意　　　　　　味》　　　　　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜＜システム関係＞　　　　　　｜　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＬＩＳＴ（Ａｌｌ）　　　　　｜０　　　　　　　　｜すべてのプログラムをリストをする　　　　　　　　　　　　　　　　　　　　　　｜ ｜　　　　（Ｆｒｏｍ）　　　　｜行番号／　　　　　｜行番号の行から最後までリストする　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＲＵＮ　　　　　　　　　　　｜＃＝１　　　　　　｜プログラムの初めから実行　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜　　　　（Ｆｒｏｍ）　　　　｜＃＝行番号　　　　｜行番号から実行（なければそれより大きい最初の行）　　　　　　　　　　　　　　｜ ｜ＮＥＷ　　　　　　　　　　　｜＆＝０　　　　　　｜ＰＧ先頭アドレス(＝)をＰＧ末ポインターに代入し、　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜その位置にＥＯＦマーク（＄ＦＦ）を書き込む　　　　　　　　　　　　　　　　　｜ ｜ＯＰＥＮ　ＦＩＬＥ　　　　　｜＆：０）＝＄ＦＦ　｜ＥＯＦマークをＯＰＥＮ状態（＄ＦＦ）にする　　　　　　　　　　　　　　　　　｜ ｜ＬＯＣＫ　ＦＩＬＥ　　　　　｜＆：０）＝＄Ｆ０　｜ＥＯＦマークをＬＯＣＫ状態（＄Ｆ０）（修正禁止）にする。　　　　　　　　　　｜ ｜ＳＥＲＡＣＨ　ＥＮＤ　　　　｜＝　＝　　　　　　｜ＰＧ末ポインター(＆)をＥＯＦマークのアドレスにセットする。　　　　　　　　　｜ ｜ＣＨＡＮＧＥ　ＰＲＯＧＲＡＭ｜＝ｎ　　　　　　　｜ＰＧ先頭ポインター(＝)をｎのアドレスにし、　　　　　　　　　　　　　　　　　｜ ｜ＢＩＧＩＮ　ＰＯＩＮＴＥＲ　｜　　　　　　　　　｜ＰＧ末ポインター(＆)をそこから最初にあるＥＯＦマークにセットする　　　　　　｜ ｜ＣＨＡＮＧＥ　ＲＡＭ　ＥＮＤ｜＊＝ｎ　　　　　　｜ＲＡＭ末ポインター(＊)をｎのアドレスにセットする。　　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜＜出力関係＞　　　　　　　　｜　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＰＲ　ＬＥＦＴ　　　　　　　｜？＝ｎ　　　　　　｜ｎの値を１０進左づめ出力　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＰＲ　ＲＩＧＨＴ　　　　　　｜？（ｍ）＝ｎ　　　｜ｎの値をｍケタで１０進右づめ出力（１＝＜ｍ＝＜２５５）　　　　　　　　　　　｜ ｜ＰＲ　４ＨＥＸ　　　　　　　｜？？＝ｎ　　　　　｜ｎの値を４ケタの１６進数で出力　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＰＲ　２ＨＥＸ　　　　　　　｜？＄＝ｎ　　　　　｜ｎの値の下位バイトを２ケタの１６進数で出力　　　　　　　　　　　　　　　　　｜ ｜ＰＲ　ＣＨＲ　　　　　　　　｜＄＝ｎ　　　　　　｜ｎの値の下位バイトを一文字のＡＳＣＩＩコードで出力　　　　　　　　　　　　　｜ ｜ＴＡＢ　　　　　　　　　　　｜．＝ｎ　　　　　　｜ｎの値だけ空白を出力（０＜＝ｎ＝＜２５５）　　　　　　　　　　　　　　　　　｜ ｜ＣＲＬＦ　　　　　　　　　　｜／　　　　　　　　｜改行する　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜文字列出力　　　　　　　　　｜”文字”　　　　　｜”で囲まれた文字列を出力する（改行子／と併用できる）　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜＜入力関係＞（入力変数）　　｜　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＩＮＰＵＴ　　　　　　　　　｜？　　　　　　　　｜変数として使用「算術式」を一行入力してその値をとる。　　　　　　　　　　　　｜ ｜ＩＮＰＵＴ　ＣＨＲ　　　　　｜＄　　　　　　　　｜変数として使用「一文字」入力してのＡＳＣＩＩコードを　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜下位１バイトとする（上位１バイトは０）　　　　　　　　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜＜制御関係＞　　　　　　　　｜　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＬＥＴ　　　　　　　　　　　｜変数＝ｎ　　　　　｜Ａ＝Ｂ＋Ｃ　：ｎの値を左辺の変数に代入する。　　　　　　　　　　　　　　　　｜ ｜ＩＦ　　　　　　　　　　　　｜；＝ｎ　　　　　　｜ｎの値が真（≠０）なら次の「文」に行く　　　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜ｎの値が偽（＝０）なら次の「行」に行く　　　　　　　　　　　　　　　　　　　｜ ｜＜制御関係＞　　　　　　　　｜　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＧＯＴＯ　　　　　　　　　　｜＃＝ｎ　　　　　　｜ｎの値の行へ行く。（ｎ＝０なら何もしない）　　　　　　　　　　　　　　　　　｜ ｜ＥＮＤ（ＳＴＯＰ）　　　　　｜＃＝−１　　　　　｜実行を終る。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＧＯＳＵＢ　　　　　　　　　｜！＝ｎ　　　　　　｜文末位置を第２スタックに納めて、ｎの値の行番号へ行く（ｎ＝０なら何もしない）｜ ｜ＲＥＴＵＲＮ　　　　　　　　｜］　　　　　　　　｜文末位置を第２スタックから取り出し、そこに戻る　　　　　　　　　　　　　　　｜ ｜ＦＯＲ−ＴＯ　　　　　　　　｜代入文，ｎ　　　　｜代入文を実行し、ｎの値を終値パラメーターとして、　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜文末位置と共にを第２スタックに納める　　　　　　　　　　　　　　　　　　　　｜ ｜ＮＥＸＴ（ＳＴＥＰ）　　　　｜＠＝ｎ　　　　　　｜ｎの値を＝の次の文字（制御変数）に代入し、　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜その値が第２スタック中の終値パラメーターを超えていれば、次の文を実行する。　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜超えていない場合は、第２スタック中の文末位置へ戻る　　　　　　　　　　　　　｜ ｜ＤＯ　　　　　　　　　　　　｜＠　　　　　　　　｜０を終値パラメーターとし文末位置と共に第２スタックに納める　　　　　　　　　｜ ｜ＵＮＴＩＬ　　　　　　　　　｜＠＝（ｎ）　　　　｜ｎの値が０（第２スタック中の終値パラメーター）より大なら（真）次の行へ行く、｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜０か負なら（偽）第２スタック中の文末位置へ戻る　　　　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜＜その他＞　　　　　　　　　｜　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＳＥＴ　ＲＮＤ　　　　　　　｜’＝ｎ　　　　　　｜乱数レジスターにｎの値を設定する　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＲＮＤ（ｎ）　　　　　　　　｜変数＝’ｎ　　　　｜１〜ｎまでの乱数を発生、変数に代入する　　　　　　　　　　　　　　　　　　　｜ ｜ＲＥＭ　　　　　　　　　　　｜行番号Ｓ　　　　　｜行番号のあと空白を置かなければ注釈文となる　　　　　　　　　　　　　　　　　｜ ｜ＭＯＤ　　　　　　　　　　　｜ｎ＝％ｍ　または　｜除算のあまりをとる。バージョンにより使用方法が異なる　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜ｎ＝％　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜マルチステートメント　　　　｜行番号　Ｓ　Ｓ…　｜空白で区切ればマルチステートメントになる　　　　　　　　　　　　　　　　　　｜ ＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−＋ ＧＡＭＥ−ＭＺインタプリタ ＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−＋ ｜ＧＡＭＥ　ＩＩＩに　　　　　｜ＭＯＤ（％）　　　｜％Ａ，％Ｂ等の使用が出来ないが、％（Ａ）、％（Ｂ）の形の単独変数として　　　｜ ｜関する変更点　　　　　　　　｜　　　　　　　　　｜使うこともできる　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜特殊変数　　　　　｜ＧＡＭＥ　ＩＩＩの演算のバグは取り除かれており、　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　｜？？＝＆−＝等の使用もさしつかえない　　　　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜エディット　　　　｜ＳＨＡＲＰ　ＢＡＳＩＣと同等なスクリーンエディタを使える　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜ＪＯＢ打切　　　　｜ＢＲＥＡＫキーを用いる、ＪＯＢ一時中止はＳＰＡＣＥ　　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜インタプリタ内部の追加機能　｜　　　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＣＨＡＮＧＥ　ＰＡＧＥ　　　｜＝＄２０００　＃＝１　｜＄２０００からプログラムを実行する　　　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　｜ページチェンジの後のサーチエンドは自動的にかかり、　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　｜そのまま実行を継続できる　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＴＡＢ　　　　　　　　　　　｜，＝ｎ　　　　　　　　｜ＧＡＭＥ　ＩＩＩのＴＡＢはスペースをプリントするが、　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　｜これはカーソルのみ移動する　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＡＮＤ　　　　　　　　　　　｜ｎ．ｍ　　　　　　　　｜ｎとｍのＡＮＤをとる　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＯＲ　　　　　　　　　　　　｜ｎ；ｍ　　　　　　　　｜ｎとｍのＯＲをとる　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＸＯＲ　　　　　　　　　　　｜ｎ！ｍ　　　　　　　　｜ｎとｍのＸＯＲをとる　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＧＥＴ　　　　　　　　　　　｜；＝［＝ｎ　　　　　　｜変数［の下位には常に押されたキーのアスキーコードが入る。　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　｜プログラムの最初で［＝０として上位をクリアする　　　　　　　　　　　　　｜ ｜−−−−−−−−−−−−−−＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−｜ ｜オプションルーチン　　　　　｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜ ｜ＳＡＶＥ　　　　　　　　　　｜＞＝＄５ＤＤ０　”ＮＡＭＥ”｜Ｆｉｌｅｎａｍｅ（１６文字まで）を付けてカセットにセーブする　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜先頭ポインタ＝からエンドポインタ＆までがセーブされる　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜任意のエリアをセーブしたい時は　　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜「＝先頭アドレス」「ニ（カタカナのニ）＝エンドアドレス」の形で　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜ポインタを操作おく必要がある　　　　　　　　　　　　　　　　　　　｜ ｜ＬＯＡＤ　　　　　　　　　　｜＞＝＄５Ｅ００　　　　　　　｜テープの内容をそのままロードする。　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜先頭ポインタは自動的に更新されサーチエンドも実行される　　　　　　｜ ｜ＶＥＲＩＦＹ　　　　　　　　｜＞＝＄５Ｅ２０　　　　　　　｜テープの内容をベリファイする　　　　　　　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜内容が異なる場合エラーが表示されるが、ＯＫの場合なにも出ない　　　｜ ｜ＤＯＷＮ　　　　　　　　　　｜＞＝＄５Ｅ４０　　　　　　　｜ダウンスクロール（カーソルは移動しない）　　　　　　　　　　　　　｜ ｜ＬＥＦＴ　　　　　　　　　　｜＞＝＄５Ｅ６０　　　　　　　｜レフトスクロール（カーソルは移動しない）　　　　　　　　　　　　　｜ ｜ＲＩＧＨＴ　　　　　　　　　｜＞＝＄５Ｅ７０　　　　　　　｜ライトスクロール（カーソルは移動しない）　　　　　　　　　　　　　｜ ｜ＭＵＳＩＣ　　　　　　　　　｜＞＝＄５Ｅ９０　ｄａｔａ　　｜ひとつスペースをあけた後の音階データ（ＳＨＡＲＰＢＡＳＩＣと同じ）｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜を演奏する。データはクオーテーションでくくらず末尾に　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜必ず■（＄Ｃ８、グラフィック文字）を置く　　　　　　　　　　　　　｜ ｜　　　　　　　　　　　　　　｜　　　　　　　　　　　　　　｜ＴＥＭＰＯは＄１１９Ｅの内容を変えればよい（１が最高速）　　　　　｜ ＋−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−＋